unit TStaff;

interface

uses
  Windows, Classes, SysUtils, uDataTransferObject, uBasicDAOAdapter;



type
  TStaffVO = class(TDataTransferObject)
  private
    FStaffid: string;
    FStaffName: string;
    FSex: string;
    FBirthday:String;
    FMobile:String;
    FPhone:String;
    FNativePlace:String;
    FHomeAddr:String;
    FContactAddr:String;
    FLevel:String;
    FJoinedDate:String;
    FLeaveDate:String;
    FDeptId:String;
    FCardId:String;
    FStatus:String;
    FInfo1:String;
    FInfo2:String;
    FInfo3:String;
    FRollMachineId:String;
    FSalary:double;
    FCertId:String;
    FSiteId:String;
  published
    property PK_staff_id: string index 0 read FStaffid write FStaffid;
    property staff_name: string index 1 read FStaffName write FStaffName;
    property sex: String index 2 read FSex write FSex;
    property birth_date: String index 3 read FBirthday write FBirthday;
    property mobile: string index 4 read FMobile write FMobile;
    property phone: string index 5 read FPhone write FPhone;
    property native_place: string index 6 read FNativePlace write FNativePlace;
    property home_addr: string index 7 read FHomeAddr write FHomeAddr;
    property contact_addr: string index 8 read FContactAddr write FContactAddr;
    property level: string index 9 read FLevel write FLevel;
    property joined_date: string index 10 read FJoinedDate write FJoinedDate;
    property leave_date: string index 11 read FLeaveDate write FLeaveDate;
    property dept_id: string index 12 read FDeptId write FDeptId;
    property card_id: string index 13 read FCardId write FCardId;
    property status: string index 14 read FStatus write FStatus;
    property info1: string index 15 read FInfo1 write FInfo1;
    property info2: string index 16 read FInfo2 write FInfo2;
    property info3: string index 17 read FInfo3 write FInfo3;
    property rollmachine_id: string index 18 read FRollMachineId write FRollMachineId;
    property salary: double index 19 read FSalary write FSalary;
    property cert_Id: string index 20 read FCertId write FCertId;
    property site_Id: string index 21 read FSiteId write FSiteId;
  public
    constructor Create;
    procedure Reset();
  end;
  
implementation

constructor TStaffVO.Create;
begin
  inherited Create;
  tbName := 'inf_staff';
  SetLength(GridInfo, 20);
end;

procedure TStaffVO.Reset();
begin
  FStaffid:='-999';
  FStaffName:='-999';
  FSex:='-999';
  FBirthday:='-999';
  FMobile:='-999';
  FPhone:='-999';
  FNativePlace:='-999';
  FHomeAddr:='-999';
  FContactAddr:='-999';
  FLevel:='-999';
  FJoinedDate:='-999';
  FLeaveDate:='-999';
  FDeptId:='-999';
  FCardId:='-999';
  FStatus:='-999';
  FInfo1:='-999';
  FInfo2:='-999';
  FInfo3:='-999';
  FRollMachineId:='-999';
  FSalary:=-999;
  FCertId:='-999';
  FSiteId:='-999';
end;  

end.
